object frmScripts: TfrmScripts Left = 747 Top = 149 BorderIcons = [biSystemMenu, biMaximize] BorderStyle = bsSizeToolWin ClientHeight = 433 ClientWidth = 227 Color = clGradientActiveCaption Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Shell Dlg 2' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} KeyPreview = True OldCreateOrder = True OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnEndDock = FormEndDock OnShow = FormShow OnStartDock = FormStartDock PixelsPerInch = 96 TextHeight = 13 object tvObjects: TTreeView Left = 0 Top = 35 Width = 227 Height = 194 Align = alTop Ctl3D = True Indent = 19 ParentCtl3D = False ReadOnly = True TabOrder = 2 OnChange = tvObjectsChange OnContextPopup = tvObjectsContextPopup OnKeyDown = tvObjectsKeyDown end object pnlTop: TPanel Left = 0 Top = 0 Width = 227 Height = 35 Align = alTop BevelOuter = bvNone TabOrder = 1 object lblJsVersion: TLabel Left = 1 Top = 3 Width = 34 Height = 11 Caption = 'Version:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False end object BtnMethods: TButton Left = 0 Top = 20 Width = 60 Height = 15 HelpContext = 619 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [fsUnderline] ParentFont = False TabOrder = 0 OnClick = BtnMethodsClick end object BtnEvents: TButton Left = 60 Top = 20 Width = 60 Height = 15 HelpContext = 5100 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = BtnMethodsClick end object pnlRight: TPanel Left = 167 Top = 0 Width = 60 Height = 35 Align = alRight BevelOuter = bvNone TabOrder = 2 object BtnHelp: TButton Left = 0 Top = 1 Width = 60 Height = 15 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BtnHelpClick end object BtnInsert: TButton Left = 0 Top = 20 Width = 60 Height = 15 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = listMethodsDblClick end end end object listMethods: TListBox Left = 0 Top = 237 Width = 227 Height = 176 Align = alClient Ctl3D = True ItemHeight = 13 ParentCtl3D = False TabOrder = 3 OnContextPopup = tvObjectsContextPopup OnDblClick = listMethodsDblClick OnKeyDown = tvObjectsKeyDown end object CmboJavaScript: TComboBox Left = 42 Top = -1 Width = 95 Height = 18 HelpContext = 5110 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -8 Font.Name = 'Small Fonts' Font.Style = [] ItemHeight = 10 ParentFont = False TabOrder = 0 OnChange = CmboJavaScriptChange Items.Strings = ( 'JavaScript 1.0/JScript 1.0' 'JavaScript 1.1' 'JavaScript 1.2' 'JavaScript 1.3' 'JScript 5.0' 'JavaScript 1.4' 'JavaScript 1.5' 'JScript 5.5') end object StatusBar: TdxStatusBar Left = 0 Top = 413 Width = 227 Height = 20 Panels = < item PanelStyleClassName = 'TdxStatusBarTextPanelStyle' end> PaintStyle = stpsOffice11 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Shell Dlg 2' Font.Style = [] end object Splitter1: TcxSplitter Left = 0 Top = 229 Width = 227 Height = 8 HotZoneClassName = 'TcxXPTaskBarStyle' AlignSplitter = salTop Control = tvObjects end object barMan: TdxBarManager AllowReset = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Bars = <> CanCustomize = False Categories.Strings = ( 'Default') Categories.ItemsVisibles = ( 2) Categories.Visibles = ( True) PopupMenuLinks = <> Style = bmsOffice11 UseSystemFont = True Left = 135 Top = 310 DockControlHeights = ( 0 0 0 0) object bbInsertTag: TdxBarButton Caption = 'InsertTag' Category = 0 Hint = 'InsertTag' Visible = ivAlways OnClick = listMethodsDblClick end object bbHelpOnTag: TdxBarButton Caption = 'HelpOnTag' Category = 0 Hint = 'HelpOnTag' Visible = ivAlways OnClick = BtnHelpClick end object bbDockable: TdxBarButton Caption = 'Dockable' Category = 0 Hint = 'Dockable' Visible = ivAlways ButtonStyle = bsChecked OnClick = miDockableClick end object bbClose: TdxBarButton Caption = 'Close' Category = 0 Hint = 'Close' Visible = ivAlways OnClick = miCloseClick end end object popupScripts: TdxBarPopupMenu BarManager = barMan ItemLinks = < item Item = bbInsertTag Visible = True end item Item = bbHelpOnTag Visible = True end item Item = bbDockable Visible = True end item BeginGroup = True Item = bbClose Visible = True end> UseOwnFont = False OnPopup = PopupMenu1Popup Left = 85 Top = 135 end end